
clear;

M = 1000;

% Genero un vector unidimensional de datos de entrada aleatorios
% uniformemente distribuidos en el intervalo [0,1]
datos_entrenamiento_uniforme = rand(M,1);
datos_entrenamiento_normal = normrnd(.5,.0625,M,1);

% Genero un vector unidimensional de datos de validacion aleatorios
% con distribucion normal en el intervalo [0,1] de parametros:
% mu = 0.5 = media del conjunto de entrenamiento
% sigma = 0,25^2 = 0.0625 = un cuarto del tamaño del intervalo
datos_testeo_normal = normrnd(.5,.0625,M,1);
datos_testeo_uniforme = rand(M,1);

for i=[0:3]
	eta = 2^i;
	kohonen(datos_entrenamiento_uniforme,datos_testeo_uniforme,M,eta,strcat('_UN_E_',int2str(2^i)));
end
